object SetDetail: TSetDetail
  Left = 0
  Top = 0
  BorderStyle = bsNone
  Caption = 'SetDetail'
  ClientHeight = 721
  ClientWidth = 1024
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object DaySelect: TShape
    Left = 125
    Top = 95
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clFuchsia
  end
  object Label1: TLabel
    Left = 205
    Top = 220
    Width = 94
    Height = 37
    Caption = 'Label1'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -32
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object ClassBox: TShape
    Left = 205
    Top = 95
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object DNbrBox: TShape
    Left = 275
    Top = 95
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object CNbrBox: TShape
    Left = 345
    Top = 95
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object DayBox1: TShape
    Left = 415
    Top = 95
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object ClassAccessSelect: TShape
    Left = 200
    Top = 55
    Width = 65
    Height = 21
    Brush.Color = 10682367
    Pen.Style = psClear
  end
  object ClassAccessBox: TShape
    Left = 270
    Top = 55
    Width = 65
    Height = 21
    Brush.Color = clYellow
    Pen.Style = psClear
  end
  object DayBox2: TShape
    Left = 485
    Top = 95
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object TNbrBox: TShape
    Left = 345
    Top = 165
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object TeacherBox: TShape
    Left = 205
    Top = 165
    Width = 65
    Height = 65
    Brush.Style = bsClear
    Pen.Color = clNavy
  end
  object btnExcel: TButton
    Left = 770
    Top = 670
    Width = 125
    Height = 25
    Hint = #21046#20316#29677#26178#38291#34920#12289#20491#21029#26178#38291#34920#12289#36913#26178#38291#34920#12289#20241#22530#26178#38291#34920#31561#12290
    Caption = 'Save to --> Excel Files'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    TabStop = False
    OnClick = btnExcelClick
  end
  object btnClose: TButton
    Left = 900
    Top = 670
    Width = 104
    Height = 25
    Hint = #38626#38283#21450#23384#20786
    Caption = 'Exit'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    TabStop = False
    OnClick = btnCloseClick
  end
  object btnSubject: TButton
    Left = 594
    Top = 670
    Width = 125
    Height = 25
    Hint = #21046#20316#29677#26178#38291#34920#12289#20491#21029#26178#38291#34920#12289#36913#26178#38291#34920#12289#20241#22530#26178#38291#34920#31561#12290
    Caption = 'Subject to --> Excel Files'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    TabStop = False
    OnClick = btnSubjectClick
  end
  object DrawTimer: TTimer
    Enabled = False
    Interval = 30
    OnTimer = DrawTimerTimer
    Left = 505
    Top = 50
  end
end
